home *** CD-ROM | disk | FTP | other *** search
/ TeX 1995 July / TeX CD-ROM July 1995 (Disc 1)(Walnut Creek)(1995).ISO / macros / latex209 / contrib / misc / rangecite.sty < prev    next >
Text File  |  1992-08-30  |  3KB  |  76 lines
  1. % RANGECITE DOCUMENT-STYLE OPTION FOR ANY STYLE WITH NUMERIC CITATIONS
  2. %
  3. % This redefines the LaTex \@cite macro to gather consecutive citation numbers
  4. % i,i+1,...,j into a range i-j
  5. % 
  6. % Nachum Dershowitz (nachum@cs.uiuc.edu)
  7. % Edward M. Reingold (reingold@cs.uiuc.edu)
  8. %
  9. % These macros are in the public domain.  You may use them and copy them at
  10. % will, provided you retain the authorship information.  We wrote these for
  11. % temporary use in a single paper, so use them at your own risk!
  12. %
  13. % Written 12 Apr 1990
  14. %
  15. %
  16. \newif\if@first%
  17. \newcounter{@@@first}%
  18. \newcounter{@@@state}%
  19. %
  20. %  A simple four-state finite automaton:
  21. %        State 0:  No references in current range
  22. %        State 1:  One reference in current range
  23. %        State 2:  Two references in current range
  24. %        State 3:  More than two references in current range
  25. %
  26. \newcounter{@@@next}%
  27. \newcounter{@@@cur}%
  28. \newcounter{@@@curt}%
  29. \newcommand{\b@@@ENDLIST}{9999}%
  30. \def\@citex[#1]#2{%
  31.   \if@filesw\immediate\write\@auxout{\string\citation{#2}}\fi%
  32.   \def\@citea{}%
  33.   \@cite{%
  34.      \@firsttrue%
  35.      \setcounter{@@@state}{0}%
  36.      \@for\@citeb:=#2,@@ENDLIST\do{%
  37.          \@ifundefined{b@\@citeb}%
  38.             {{\bf ?}%
  39.              \@warning{Citation `\@citeb' on page \thepage \space undefined}}%
  40. %        else%
  41.             {\setcounter{@@@next}{\csname b@\@citeb\endcsname}%
  42.              \ifcase\the@@@state%
  43. %                  state 0:
  44.                \setcounter{@@@state}{1}%
  45.              \or%  state 1:
  46.                \ifnum\value{@@@next}=\value{@@@curt}%
  47.                   \setcounter{@@@state}{2}%
  48.                   \setcounter{@@@first}{\value{@@@cur}}%
  49.                \else%
  50.                   \if@first{}\else{,\ }\fi%
  51.                   \the@@@cur%
  52.                   \@firstfalse%
  53.                \fi%
  54.              \or%  state 2:
  55.                \ifnum\value{@@@next}=\value{@@@curt}%
  56.                   \setcounter{@@@state}{3}%
  57.                \else%
  58.                   \setcounter{@@@state}{1}%
  59.                   \if@first{}\else{,\ }\fi%
  60.                   \the@@@first,\ \the@@@cur%
  61.                   \@firstfalse%
  62.                \fi%
  63.              \or%  state 3:
  64.                \ifnum\value{@@@next}=\value{@@@curt}%
  65.                \else%
  66.                   \setcounter{@@@state}{1}%
  67.                   \if@first{}\else{,\ }\fi%
  68.                   \the@@@first-\the@@@cur%
  69.                   \@firstfalse%
  70.                \fi%
  71.             \fi%
  72.          \setcounter{@@@cur}{\value{@@@next}}%
  73.          \setcounter{@@@curt}{\value{@@@cur}}%
  74.          \addtocounter{@@@curt}{1}}}}%
  75.   {#1}}%
  76.